<?
$id = Addresing::get('saved');
require_once 'foresee_content.php';
$result = ForeseeDiagrams::get_saved($id);
if ($result) {
    list($name, $value) = $result;
    $saved_request = unserialize($value);
    
    require_once 'DB/db_data_loader.php';
    $subdivisions = get_subdivisions_associative();
    require 'Processing/Subdivisions/subdivision_data_processing.php';
    $dates = SubdivisionData::get_dates_predicted(12);
    
    /* Name of saved foressee */
    if ($name) {
        MainDesign::h1($name);
    } else {
        MainDesign::h1("Naujų paramos priemonių įtaka");
    }
    
    /* Entered data */
    MainDesign::viewSectionBegin("Prognozei naudojamos paramos priemonės");
        ForeseeDiagrams::draw_request($saved_request, $subdivisions);
    MainDesign::viewSectionEnd();
    
    /* Content */
    ForeseeDiagrams::draw($saved_request, $subdivisions, $dates, 18, 700);
} else {
    $tab = Addresing::get_requested_tab();
    ?>
    Nepavyko rasti išsaugotos prognozės arba padaryta klaida adreso laukelyje.<br/>
    Pabandykite pasirinkti <a href="?<?=$tab;?>">versiją spausdinimui</a> iš naujo
    <?
}
